Scriptbox - Find your Script, VBScript VBScripts VB-Script VB-Scripts Scripting

Loading

:: { Category } ::

0-9


	Search Options: Create a Sequential Series of Folders Content of Create a Sequential Series of Folders.vbs MD5 Hash: F0CA95F071BBA8D6A883E905C33D6C49
	Set objFSO = CreateObject("Scripting.FileSystemObject") intStartingFolder = InputBox("Please enter the starting number:") intEndingFolder = InputBox("Please enter the ending number:") For i = intStartingFolder to intEndingFolder strNumber = i Do While Len(strNumber) < 5 strNumber = "0" & strNumber Loop strFolder = "C:\Scripts\2007-" & strNumber Set objFolder = objFSO.CreateFolder(strFolder) Next

© 2008 - 2013 Boris Toll :: Scripts available: 6.481 :: :: scriptbox.toll.at :: :: powered by www.toll.at ::